home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Internet Tools 1993 July / Internet Tools.iso / RockRidge / mail / pp / pp-6.0 / Tools / misc / t-rdmsg.c < prev    next >
Encoding:
C/C++ Source or Header  |  1991-12-18  |  936 b   |  50 lines

  1. /* t-rdmsg.c - tests for erroneous messages */
  2.  
  3. # ifndef lint
  4. static char Rcsid[] = "@(#)$Header: /xtel/pp/pp-beta/Tools/misc/RCS/t-rdmsg.c,v 6.0 1991/12/18 20:30:40 jpo Rel $";
  5. # endif
  6.  
  7. /*
  8.  * $Header: /xtel/pp/pp-beta/Tools/misc/RCS/t-rdmsg.c,v 6.0 1991/12/18 20:30:40 jpo Rel $
  9.  *
  10.  * $Log: t-rdmsg.c,v $
  11.  * Revision 6.0  1991/12/18  20:30:40  jpo
  12.  * Release 6.0
  13.  *
  14.  */
  15.  
  16.  
  17.  
  18. #include "head.h"
  19. #include "prm.h"
  20. #include "q.h"
  21.  
  22.  
  23. main (argc, argv)
  24. int     argc;
  25. char    *argv[];
  26. {
  27.     struct prm_vars prm;
  28.     Q_struct        que;
  29.     ADDR            *sender = NULL;
  30.     ADDR            *recips = NULL;
  31.     int             retval, rcount;
  32.     char            *name = argv[1];
  33.  
  34.  
  35.     if (argc != 2) {
  36.         printf ("\n\nUsage:  t-rdmsg msg.XXXX\n\n");
  37.         return;
  38.     }
  39.  
  40.     sys_init (argv[0]);
  41.  
  42.     prm_init (&prm);
  43.     q_init (&que);
  44.  
  45.     retval = rd_msg (name,&prm,&que,&sender,&recips,&rcount);
  46.     printf ("%s: %s %s\n", argv[0], argv[1], rp_valstr (retval));
  47.     rd_end();
  48.     return;
  49. }
  50.